home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Pascal Super Library
/
Pascal Super Library (CW International)(1997).bin
/
LIBRARY
/
TP_TOOLS
/
LIST.DOC
< prev
next >
Wrap
Text File
|
1992-12-24
|
3KB
|
94 lines
PROGRAMMING MANUAL
------------------
The following list of routines were written to provide disk I/O interface
support for programs written in Turbo Pascal (version 5.0). The routines
include:
LIST_BUILD
LIST_ERASE
LIST_DIRECTORY
The following is a programming example for proper use of the list routines:
PROGRAM LIST_EXAMPLE
USES DOS, CRT, GRAPH, LIST
BEGIN
LIST_BUILD('TEST.LST');
LIST_DIRECTORY(10,10,'*.LST',Output);
LIST_ERASE('TEST.LST');
END;
NOTES: 1) The list unit must be included in the USES line (along with any
other required units).
PROGRAMMING MANUAL
------------------
LIST_BUILD
USE LIST_BUILD(txt);
FUNCTION Generates an empty file with the filename "txt".
ARGUMENTS txt :STRING
Specifies the name of a file to produce.
Legal Values: Any 8 character string.
COMMENTS Use this routine to produce a set of files that correspond to a set
of program options. This is sometimes required when the options do
not involve disk I/O, but when the programmer wants to use the the
LIST routines for option selection.
PROGRAMMING MANUAL
-----------------
LIST_ERASE
USE LIST_ERASE(txt);
FUNCTION Erases the file with the filename "txt".
ARGUMENTS txt :STRING
Specifies the name of a file to erase.
Legal Values: Any 8 character string.
COMMENTS Use this routine to remove the "dummy" files created with the
LIST_BUILD routine. This routine first checks to insure that the
specified file exists on the disk.
PROGRAMMING MANUAL
-----------------
LIST_DIRECTORY
USE LIST_DIRECTORY(x, y, txtin, txtout);
FUNCTION Provides a mouse driven interface disk I/O.
ARGUMENTS x :INTEGER
Specifies the horizontal location of the interface window.
Legal Values: 1 to 55.
y :INTEGER
Specifies the vertical location of the interface window.
Legal Values: 1 to 8.
txtin :STRING
Specifies the file type to load and scan.
Legal Values: Any 3 character string.
txtout :STRING
Returns the selected filename.
COMMENTS This routine is not case sensitive and will return the upper case
equivalent of any filename selected or entered.